home *** CD-ROM | disk | FTP | other *** search
/ Graphics Plus / Graphics Plus.iso / general / fractal / kaos.lha / complib / free_dtmatrix.c < prev    next >
Encoding:
C/C++ Source or Header  |  1989-11-18  |  310 b   |  18 lines
  1. /*
  2. ### free memory for 2-d array (matrix) ###
  3. */
  4.  
  5. void free_dtmatrix(m,nvl,nvh,nrl,nrh,ncl,nch)
  6. double ***m;
  7. int nvl,nvh,nrl,nrh,ncl,nch;
  8. {
  9.     int i,j;
  10.  
  11.     for(i=nvh;i>=nvl;i--){
  12.         for(j=nrh;j>=nrl;j--) free((char *) (m[i][j]+ncl));
  13.     }
  14.  
  15.     for(i=nvh;i>=nvl;i--) free((char *) (m[i]+nrl));
  16.     free((char *) (m+nrl));
  17. }
  18.